Міністерство освіти і науки України Національний університет „ Львівська політехніка “ Розрахункова робота З дисципліни «Інформатика»  Завдання №1 Тема:Одновимірний масив Завданння: Задано одновимірний масив сукупності чисел =(0.1,-25.2,0,888.35,-424.48,0,15,-7,-195,2,0,0.04,-15.2,57.6); Обчислити суму додатніх елементів масиву. Блок-схема Код програми: program mas1; const y:array [1..14] of real = (0.1,-25.2,0,888.35,-424.48,0,15,-7,-195,2,0,0.04,-15.2,57.6); var i:integer;s:real; begin for i:=1 to 14 do if y[i]>0 then s:=s+y[i] ; if s=0 then writeln('elementiv masivu bilshich 0 nema') else writeln('suma=',s); readln end. Результат: suma =9.63; Завдання №2 Тема:Утворення одновимірних масивів Завдання:Утворити масив